class: center, middle, inverse, title-slide # Compare locations/events with geobubble charts --- layout: true <div class="dk-footer"> <span> <a href="https://rfortherestofus.com/" target="_blank">R for the Rest of Us </a> </span> </div> --- class: center, middle, dk-section-title background-image:url("https://images.pexels.com/photos/2853937/pexels-photo-2853937.jpeg?auto=compress&cs=tinysrgb&dpr=2&h=750&w=1260") background-size: cover # Compare locations (or events) with geobubble charts --- # Geobubble charts <center><img src='images/gg_brazil_cities.png' width='800px'/></center> --- # Geobubble charts <center><img src='images/gg_quakes.png' width='700px'/></center> --- # Geobubble <span style='color:#fd8f24'>scales</span> <svg aria-hidden="true" role="img" viewBox="0 0 640 512" style="height:1em;width:1.25em;vertical-align:-0.125em;margin-left:auto;margin-right:auto;font-size:inherit;fill:#fd8f24;overflow:visible;position:relative;"><path d="M256 336h-.02c0-16.18 1.34-8.73-85.05-181.51-17.65-35.29-68.19-35.36-85.87 0C-2.06 328.75.02 320.33.02 336H0c0 44.18 57.31 80 128 80s128-35.82 128-80zM128 176l72 144H56l72-144zm511.98 160c0-16.18 1.34-8.73-85.05-181.51-17.65-35.29-68.19-35.36-85.87 0-87.12 174.26-85.04 165.84-85.04 181.51H384c0 44.18 57.31 80 128 80s128-35.82 128-80h-.02zM440 320l72-144 72 144H440zm88 128H352V153.25c23.51-10.29 41.16-31.48 46.39-57.25H528c8.84 0 16-7.16 16-16V48c0-8.84-7.16-16-16-16H383.64C369.04 12.68 346.09 0 320 0s-49.04 12.68-63.64 32H112c-8.84 0-16 7.16-16 16v32c0 8.84 7.16 16 16 16h129.61c5.23 25.76 22.87 46.96 46.39 57.25V448H112c-8.84 0-16 7.16-16 16v32c0 8.84 7.16 16 16 16h416c8.84 0 16-7.16 16-16v-32c0-8.84-7.16-16-16-16z"/></svg> In a geobubble chart we use the <span style='color:#c03728'>size aesthetic</span> of `geom_point()` to vary the size of our bubbles. -- There are <span style='color:#fd8f24'>**two extremely different scales**</span> that {ggplot2} can use to decide how to vary the sizes of the points: -- - scale_size()<sup>1</sup> - scale_radius() .footnote[ [1] The default chosen by {ggplot2} ] --- ## Don't use scale_radius() <center><img src='images/gg_bubble_size_by_radius.png' width='800px'/><center> --- ## Use scale_size_area() <center><img src='images/gg_bubble_size_by_area.png' width='800px'/><center> --- class: my-turn ## My turn .pull-left[ I'm going to recreate this geobubble chart. ] .pull-right[ <center><img src='images/gg_brazil_cities.png' width='800px'/></center> ] --- # <svg aria-hidden="true" role="img" viewBox="0 0 512 512" style="height:1em;width:1em;vertical-align:-0.125em;margin-left:auto;margin-right:auto;font-size:inherit;fill:#919c4c;overflow:visible;position:relative;"><path d="M128,256A128,128,0,1,0,256,384,128,128,0,0,0,128,256Zm379-54.86L400.07,18.29a37.26,37.26,0,0,0-64.14,0L229,201.14C214.76,225.52,232.58,256,261.09,256H474.91C503.42,256,521.24,225.52,507,201.14ZM480,288H320a32,32,0,0,0-32,32V480a32,32,0,0,0,32,32H480a32,32,0,0,0,32-32V320A32,32,0,0,0,480,288Z"/></svg> <span style='color:#919c4c'>geom_point(pch = ?)</span> geom_point() is unique in that it has a `pch`<sup>1</sup> argument - this controls which shape is drawn on your chart. <br> <img src='images/gg_shape_types.png'/> .footnote[ [1] `pch` stands for "plotting character" ] --- class: inverse ## Your turn .pull-left[ Use the `your-turn.R` script in 02_04 to create this geobubble chart of the most popular airports in the US. - Ensure small circles are not overlapped by bigger circles - Give the circles both a fill color and border color ] .pull-right[ <img src='images/gg_us_airports.png'/> ]